home *** CD-ROM | disk | FTP | other *** search
/ Mac Power 1997 December / MACPOWER-1997-12.ISO.7z / MACPOWER-1997-12.ISO / MacPowerオリジナル / Edutainment World / チャンプジム for DEMO / DIR / SETTEI.DIR / 00003_Script_3 < prev    next >
Text File  |  1997-09-24  |  846b  |  27 lines
  1. on checkIndicator
  2.   put getAt(SETTEI,1) & "," & getAt(SETTEI,2) into mode
  3.   
  4.   case(mode) of
  5.     "0,0":
  6.       set the castNum of sprite 18 to the number of cast "筰"
  7.       repeat with i=19 to 21
  8.         set the castNum of sprite i to the number of cast "îí"
  9.       end repeat
  10.     "0,1":
  11.       repeat with i=18 to 19
  12.         set the castNum of sprite i to the number of cast "筰"
  13.       end repeat
  14.       repeat with i=20 to 21
  15.         set the castNum of sprite i to the number of cast "îí"
  16.       end repeat
  17.     "1,0":
  18.       repeat with i=18 to 20
  19.         set the castNum of sprite i to the number of cast "筰"
  20.       end repeat
  21.       set the castNum of sprite 21 to the number of cast "îí"
  22.     "1,1":
  23.       repeat with i=18 to 21
  24.         set the castNum of sprite i to the number of cast "筰"
  25.       end repeat
  26.   end case
  27. end